COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	
C00006 ENDMK
C⊗;

VARIABLE /R; <REV SIG. IS IN P7, DIRECT IS IN P8
INSTRUMENT TOOT;
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P6);<P6 IS TONE COLOR FOR 'TOOT'
R←U2*P7;
OUTA←OUTA+U2*P8;END;
R←0;